home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Tech Arsenal 1
/
Tech Arsenal (Arsenal Computer).ISO
/
tek-04
/
blrplt.zip
/
MESSAGES.DAT
< prev
next >
Wrap
Text File
|
1993-04-09
|
2KB
|
91 lines
*wm_Char
{wParam, the char.
lParam, miscellaneous key info.}
begin
end;
*wm_LButtonDown
{wParam, a combination of MK_CONTROL, MK_MBUTTON, MK_RBUTTON, MK_SHIFT
lParamLo, X cursor pos rel to upper left corner of window (dev coord)
lParamHi, Y cursor pos}
begin
end;
*wm_LButtonDblClk
{wParam, a combination of MK_CONTROL, MK_MBUTTON, MK_RBUTTON, MK_SHIFT
lParamLo, X cursor pos rel to upper left corner of window (dev coord)
lParamHi, Y cursor pos}
begin
end;
*wm_RButtonDown
{wParam, a combination of MK_CONTROL, MK_MBUTTON, MK_LBUTTON, MK_SHIFT
lParamLo, X cursor pos rel to upper left corner of window (dev coord)
lParamHi, Y cursor pos}
begin
end;
*wm_LButtonUp
{wParam, a combination of MK_CONTROL, MK_MBUTTON, MK_RBUTTON, MK_SHIFT
lParamLo, X cursor pos rel to upper left corner of window (dev coord)
lParamHi, Y cursor pos}
begin
end;
*wm_RButtonUp
{wParam, a combination of MK_CONTROL, MK_MBUTTON, MK_LBUTTON, MK_SHIFT
lParamLo, X cursor pos rel to upper left corner of window (dev coord)
lParamHi, Y cursor pos}
begin
end;
*wm_MouseMove
{wParam, a combination of MK_CONTROL, MK_LBUTTON, MK_RBUTTON, MK_SHIFT
lParamLo, X cursor pos rel to upper left corner of window (dev coord)
lParamHi, Y cursor pos}
begin
end;
*wm_Close
begin
@XX2.wmClose(Msg);
end;
*wm_Size
{wParam, SizeFullScreen, SizeNormal, or SizeIconic
lParamLo, client area width in pixels
lParamHi, client area height}
begin
end;
*wm_Paint
var
PS : TPaintStruct;
DC : HDC;
begin
DC := BeginPaint(hWindow, PS);
EndPaint(hWindow, PS);
end;
*wm_SetFocus
begin
end;
*wm_KillFocus
begin
end;
*wm_InitMenu
{wParam, a handle to the menu}
begin
end;
*wm_Timer
{wParam, the timer ID}
begin
end;
*wm_CtlColor
{wParam, display context handle of child window
lParamLo, window handlw of child window
lParamHi, type of child window such as cntcolor_Listbox}
begin
DefWndProc(Msg); {must be called for all messages not processed here}
end;
*wm_KeyDown
{wParam, virtual keycode
lParamLo, repeat time of key
lParamHi, misc key info}
begin
end;
*wm_Destroy
begin
@XX2.wmDestroy(Msg);
end;